home *** CD-ROM | disk | FTP | other *** search
/ Mega Game 2000 #3 / Mega Game № 03 2000.iso / Data / Mainmenu.dxr / Script_16_banner_ctrl.ls < prev    next >
Encoding:
Text File  |  2000-02-15  |  977 b   |  49 lines
  1. global stateSound, nameSoundFon
  2.  
  3. on mouseEnter
  4.   tmpMember = the currentSpriteNum
  5.   case tmpMember of
  6.     8:
  7.       cursor([member("cur_3"), member("cur_3_m")])
  8.       tmpHint = "h_mg"
  9.     9:
  10.       cursor([member("cur_3"), member("cur_3_m")])
  11.       tmpHint = "h_pl"
  12.   end case
  13.   set the member of sprite 110 to tmpHint
  14. end
  15.  
  16. on mouseLeave
  17.   tmpMember = the currentSpriteNum
  18.   tmpCastName = "h_null"
  19.   tmpHint = "h_null"
  20.   case tmpMember of
  21.     8:
  22.       cursor(0)
  23.     9:
  24.       cursor(0)
  25.   end case
  26.   set the member of sprite 110 to tmpHint
  27. end
  28.  
  29. on mouseDown
  30.   tmpMember = the currentSpriteNum
  31.   tmpCastName = "h_null"
  32.   tmpHint = "h_null"
  33.   case tmpMember of
  34.     8:
  35.       set the member of sprite 110 to "h_null"
  36.       cursor(0)
  37.       updateStage()
  38.       open(browserName() && "http://www.gamecenter.ru")
  39.     9:
  40.       set the member of sprite 110 to "h_null"
  41.       cursor(0)
  42.       updateStage()
  43.       open(browserName() && "http://www.submarine.ru")
  44.   end case
  45. end
  46.  
  47. on mouseUp
  48. end
  49.